home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64-128Toolkit / MSD-DU06.ARC / MEM MAP 4 < prev    next >
Encoding:
Text File  |  2019-04-13  |  11.5 KB  |  184 lines

  1. ║CM:TABLE 1.3
  2. ║FP
  3.  
  4.  
  5. ╘ABLE 2.  ═╙─ ╙─-1/╙─-2 ─ISK ─RIVE - ─╧╙ ╓2.3 ╥╧═ ═AP
  6.  
  7. ═╙─   ╠┴┬┼╠    ─┼╙├╥╔╨╘╔╧╬                                      1541 ╬╧╘┼
  8. -------------------------------------------------------------------------
  9. ├000  ─╧╙╓┼╥   ─╧╙ VERSION NUMBER ('2.3')                         -
  10. ├003  ╙┼╘╠┼─   ╘URN ON ACTIVITY ╠┼─ SPECIFIED BY DRIVE #        ├100  ╥ 
  11. ├00╞  ┼╥╥╧╞╞   ├LEAR ERROR FLAGS                                ├123  ╥ 
  12. ├018  ╠┼─╧╞╞   ╘URN OFF ╠┼─ SPECIFIED BY DRIVE #                  -   ╥╒
  13. ├036  ┼╥╥╧╬    ╙ET ERROR FLAGS                                  ├12├  ╥ 
  14. ├055  ┼╥╥╠┼─   ╞LASH ERROR ╠┼─ SPECIFIED BY DRIVE #               -   ╬╒
  15. ├06─    -      .BYT $┴┴ ┴┴.....THRU ├080 (UNUSED)                 -    
  16. ├081  ╒╘╠╧─╥   ╒TILITY LOADER ENTRY POINT                       ┼7┴3  ═ 
  17.                .BYT $60 (RETURN; ╒╘╠╧─╥ NOT USED IN ═╙─)
  18. ├082  ╨┴╥╙╪╤   ╨ARSE AND EXECUTE STRING IN COMMAND BUFFER       ├146
  19. ├0├╞  ┼╬─├═─   ╙UCCESSFUL COMMAND TERMINATION                   ├194  ═
  20. ├0╞2  ├╠╥├┬    ├LEAR COMMAND BUFFER                             ├1┬─
  21. ├0╞─  ├═─┼╥╥   ├OMMAND LEVEL ERROR PROCESSING                   ├1├8
  22. ├106  ╙╔═╨╥╙   ╙IMPLE PARSER                                    ├1─1
  23. ├11┴  ╨╥╙├╠╬   ╞IND POSITION OF COLON                           ├1┼5
  24. ├123  ╘┴╟├═─   ╘AG COMMAND STRING; SET UP COMMAND STRUCTURE     ├1┼┼
  25. ├18┼  ╨┴╥╙┼    ╨ARSE STRING; LOOK FOR SPECIAL CHARACTERS        ├268
  26. ├1├1  ╨╥30     ├HARACTER NOT FOUND                              ├29┼
  27. ├1─5  ├═─╙┼╘   ╔NITIALIZE COMMAND TABLE, POINTERS, ETC          ├2┬3
  28. ├1╞─  ├═─╥╙╘   ├LEAR VARIABLE TABLES                            ├2─├
  29. ├232  ╧╬┼─╥╓   ╙ET UP 1ST DRIVE AND TABLE POINTERS              ├312
  30. ├23├  ┴╠╠─╥╙   ╙ET UP ALL DRIVES FROM ╞2├╬╘                     ├320 
  31. ├25┴  ╙┼╘─╥╓   ╙ET DRIVE NUMBER                                 ├33├
  32. ├286  ╙┼╘┴╬┘   ╙ET DRIVE FROM ANY CONFIGURATION                 ├368
  33. ├2┴9  ╘╧╟─╥╓   ╘OGGLE DRIVE NUMBER                              ├38╞
  34. ├2┬2  ╞╙1╙┼╘   ╙ET POINTER TO ONE FILE STREAM AND CHECK TYPE    ├398
  35. ├2─3  ╘╙╘╧╓1   ╘EST CHARACTER IN ACCUMULATOR FOR '0' OR '1'     ├3┬─
  36. ├2┼0  ╧╨╘╙├╚   ╧PTIMAL SEARCH FOR ╠╧╧╦╒╨ AND ╞╬─╞╔╠             ├3├┴
  37. -------------- ╙EARCH ╘ABLE ---------------------------------------------
  38. ├357  ╙├╚╘┬╠   .BYT $00 80 41                                   ├440
  39.                .BYT $01 01 01 01
  40.                .BYT $81 81 81 81
  41.                .BYT $42 42 42 42
  42. ├366  ╠╧╧╦╒╨   ╠OOKUP FILES IN STREAM AND FILL TABLE WITH INFO  ├44╞  ═
  43. ├398  ╞╞╥┼     ╞IND NEXT FILENAME MATCHING ANY FILE IN STREAM   ├48┬  ═
  44.                AND RETURN WITH ENTRY IN TABLE
  45. ├3┴2  ╞╞╙╘     ╞IND STARTING ENTRY IN THE DIRECTORY             ├49─
  46. ├3┬9  ╞╬─╞╔╠   ├ONTINUE SCAN OF DIRECTORY                       ├4┬5
  47. ├3──  ╠╦15     ╙WITCH DRIVES AND SEARCH                         ├462
  48. ├3┼┴  ├╧═╨┴╥   ├OMPARE ALL FILE NAMES IN STREAM TABLE WITH      ├4─8
  49.                EACH VALID ENTRY IN THE DIRECTORY
  50. ├49┼  ├═╨├╚╦   ├HECK TABLE FOR UNFOUND FILES                    ├589
  51. ├4┴7  ├├10     ─ECREMENT FILE COUNT                             ├594 
  52. ├4┬┼  ╙╥├╚╙╘   ╙EARCH DIRECTORY; RETURNS WITH VALID ENTRY       ├5┴├  ═
  53. ├516  ╙╥╥┼     ╥E-ENTER DIRECTORY SEARCH                        ├604 
  54. ├529  ╙┼┴╥├╚   ├ONTINUE SEARCH                                  ├617
  55. ├54╞  ┴╒╘╧1    ├HECK DRIVE FOR ACTIVE DISK; INIT IF NEEDED      ├63─
  56. ├584  ╘╥╬┴═┼   ╘RANSFER FILE NAME FROM COMMAND TO BUFFER        ├66┼
  57.                  ┴ STRING SIZE
  58.                  ╪ STARTING INDEX IN COMMAND BUFFER
  59.                  ┘ BUFFER NUMBER
  60. ├59┼  ╘╥├═┬╞   ╘RANSFER COMMAND BUFFER TO OTHER BUFFER          ├688
  61. ├5┬├  ╞╬─╠═╘   ╞IND LIMIT OF STRING IN ├═─┬╒╞ POINTED BY ╪      ├6┴6
  62. ├5┼3  ╟┼╘╬┴═   ╟ET FILE ENTRY FROM DIRECTORY                    ├6├┼   
  63. ├5╞3  ╟╬╙╒┬    ╟ET FILE ENTRY SUBROUTINE                        ├6─┼   
  64. ├6├1  ┬╠╦╬┬    ┬LANK NAME BUFFER                                ├7┴├
  65. ├6├├  ╬┼╫─╔╥   ╬EW DIRECTORY IN LISTING                         ├7┬7  ═
  66. ├71┬  ═╙╟╞╥┼   ─ISPLAY '┬╠╧├╦╙ ╞╥┼┼' MESSAGE                    ├806
  67. ├72├  ╞╥┼═╙╟   .BYT ┬ ╠ ╧ ├ ╦ ╙  ╞ ╥ ┼ ┼                        ├817
  68. ├738  ╙├╥╘├╚   ╙CRATCH FILES                                    ├823
  69. ├793  ─┼╠╞╔╠   ─ELETE FILE BY LINKS                             ├87─  ═
  70. ├7┬┬  ─┼╠─╔╥   ─ELETE DIRECTORY ENTRY                           ├8┬6
  71. ├7├6  ─╒╨╠├╘   ─UPLICATE DISK                                   ├8├1  ═
  72. ├7├╞  ─╒╨╠┬╥   ─UPLICATE (BRANCHES HERE IF ╙─-2)                  -   ╬
  73. ├85┼  ╙╫╔─╥╓   ├HANGE TO OTHER DRIVE AND TURN MOTOR ON            -   ╬
  74. ├867  ─╒╨╘╥╦   ─UPLICATE CURRENT TRACK ON OTHER DRIVE             -   ╬
  75. ├872  ─╒╨╚╠╞   ─UPLICATE HALF A TRACK                             -   ╬
  76. ├8╞2  ─╒╨╔╬╔   ╔NITIALIZE START SECTOR AND BUFFER                 -   ╬
  77. ├8╞┼  ─╒╨╙┼╘   ╙ET UP PARAMETERS TO READ A SECTOR                 -   ╬
  78. -------------- ┼XTRA ╥┴═ ╙TORAGE ┴DDRESSES (╙─-2)----------------------
  79. ├928  ╪╥┴═     $5000  $5118  $5230                                -   ╬
  80.                $5046  $515┼  $5276
  81.                $508├  $51┴4  $52┬├
  82.                $50─2  $51┼┴  $5302
  83. ├940  ─╒╨╥╧    ╥EAD DATA FOR CURRENT BLOCK                        -   ╬
  84. ├95─  ─╒╨┼╥╥   ┼RROR OCCURRED DURING DUPLICATION                  -   ╬
  85. ├977  ─╒╨╚─╥   ┬UILD HEADER, READ IT AND WAIT FOR DATA            -   ╬
  86. ├982  ─╒╨╬╪╘   ╔NCREMENT CONTROLS FOR THE NEXT SECTOR             -   ╬
  87. ├992  ─╙╦├╧╨┘  ├OPY (├OPY BETWEEN DRIVES, IF ╙─-2)              ├8╞0  ╥
  88. ├9╞7  ─╒╨╨╥═   ╙YNTAX CHECK FOR ─0=1, ─1=0, ├0=1, ├1=0            -   ╬
  89. ├┴21  ├╨┘┴╠╠   ╙ET UP TO COPY FILES (EG ├0:*=1, . . . ETC)        -   ╬
  90. ├┴┴┬  ├╨┘╬┴═   ├OPY FILE NAME FROM DIRECTORY TO ├═─┬╒╞            -   ╬
  91. ├┴┬┬  ╨╒╨╙╔    ╙ET UP SUBROUTINE                                ├932
  92. ├┴─┬  ├╧╨┘     ├OPY FILE(S) TO ONE FILE                         ├952
  93. ├┬34  ├┘       ├HECK IF FILE EXISTS                             ├9┴7
  94. ├┬84  ╧╨╔╥╞╠   ╧PEN INTERNAL READ FILE                          ├9╞┴
  95. ├┬┬┼  ╟╔┬┘╘    ╟ET A BYTE; SET UP INTERNALS                     ├┴35
  96. ├┬├7  ╟├┬┘╘    ╟ET A BYTE                                       ├┴39
  97. ├┬──  ├┘┼╪╘    ├OPY RELATIVE RECORDS                            ├┴53
  98. ├├14  ╥┼╬┴═┼   ╥ENAME FILE IN DIRECTORY                         ├┴88
  99. ├├5╞  ├╚╦╔╬    ├HECK IF FILE IS PRESENT                         ├┴├├  ═ 
  100. ├├78  ├╦╦10    ═ -  ├OMMAND                                     ├┴┼7  
  101. ├├89  ═┼═      ═EMORY ACCESS COMMAND                            ├┴╞8
  102. ├├┴4  ═┼═┼╪    ═EMORY-┼XECUTE (═-┼)                             ├┬1─
  103. ├├┴7  ═┼═╥─    ═EMORY-╥EAD (═-╥)                                ├┬20
  104. ├├─1  ═┼═┼╥╥   ┬AD COMMAND ERROR                                ├┬4┬
  105. ├├─6  ═┼═╫╥╘   ═EMORY-╫RITE (═-╫)                               ├┬50  ═
  106. -------------- ┴DDRESS ├ONVERSION ┼QUIVALENTS ╘RAP ╘ABLE --------------
  107. ├├┼╞  ╘╥┴╨╘┬   .BYT $00 01 02 03 04 05                            -   ╬
  108.                .BYT $0├ 18 0─ 19 0┼ 1┴ 0╞ 1┬                          
  109.                .BYT $10 1├ 11 1─ 24 26 25 27                          
  110. ├─05  ╘╥┴╨     ═ODIFY TARGET ADDRESS FOR ═-╥, ═-╫ & ═-┼           -   ╬
  111. ├─4┴  ╒╙┼╥     ╒SER COMMAND                                     ├┬5├
  112. ├─51  ╒╙╥╔╬╘   ╒SER JUMP INITIALIZE                             ├┬63
  113. ├─5┴  ╒╙╔╧     ╒SER CODE ENTRANCE FOR EXECUTION                 ├┬6├
  114. ├─60  ╒╙╥┼╪├   ╒SER CODE EXECUTION FROM TABLE                   ├┬72  ═
  115. ├─7┴  ╧╨╬┬╠╦   ╧PEN DIRECT ACCESS BUFFER FROM OPEN BUFFER       ├┬84  ═
  116. ├─├╞  ╧┬30     ╙ET READ AND WRITE FLAGS                         ├─╞1
  117. ├─╞9  ┬╠╧├╦    ┬LOCK COMMAND                                    ├├1┬
  118. ├┼06  ┬╠╦10    ┬AD COMMAND ERROR                                ├├26
  119. ├┼09  ┬╠╦30    ┬AD SYNTAX ERROR                                 ├├2┬
  120. ├┼0┼  ┬╠╦40    ╞IND COMMAND                                     ├├30
  121. ├┼20  ┬╠╦60    ┼XECUTE COMMAND                                  ├├42
  122. ├┼3┬  ┬├╘┴┬    .BYT ┴ ╞ ╥ ╫ ┼ ╨  ╬AMES OF BLOCK COMMANDS        ├├5─
  123. -------------- ┬LOCK ╩UMP ╘ABLE -----------------------------------------
  124. ├┼42  ┬├╩═╨    $├┼─┴   ┬-┴                                      ├├63
  125.                $├┼├─   ┬-╞
  126.                $├╞2─   ┬-╥
  127.                $├╞4┴   ┬-╫
  128.                $├╞7┴   ┬-┼
  129.                $├╞91   ┬-╨
  130. ├┼4─  ┬╠╦╨┴╥   ╨ARSE BLOCK PARAMETERS                           ├├6╞
  131. ├╞7├  ┴╙├╚┼╪   ├ONVERT ┴╙├╔╔ TO HEX AND STORE IN TABLE          ├├┴1
  132. -------------- ╘ABLE ─ECIMAL ╓ALUES -------------------------------------
  133. ├┼├┴  ─┼├╘┴┬   .BYT 1 10 100                                    ├├╞2
  134. ├┼├─  ┬╠╦╞╥┼   ┬LOCK-╞REE (┬-╞)                                 ├├╞5
  135. ├┼─┴  ┬╠╦┴╠├   ┬LOCK-┴LLOCATE (┬-┴)                             ├─03
  136. ├╞0─  ┬╠╦╥─2   ┬-╥ SUBROUTINE                                   ├─36
  137. ├╞13  ╟┼╘╙╔═   ┬-╥ SUBROUTINE                                   ├─3├
  138. ├╞19  ┬╠╦╥─3   ┬-╥ SUBROUTINE                                   ├─42
  139. ├╞2─  ┬╠╦╥─    ┬LOCK-╥EAD (┬-╥)                                 ├─56  ═ 
  140. ├╞36  ╒┬╠╦╥─   ╒SER DIRECT READ                                 ├─5╞
  141. ├╞4┴  ┬╠╦╫╘    ┬LOCK-╫RITE (┬-╫)                                ├─73
  142. ├╞50  ╒┬╠╦╫╘   ╒SER DIRECT WRITE                                ├─97
  143. ├╞7┴  ┬╠╦┼╪├   ┬LOCK-┼XECUTE (┬-┼)                              ├─┴3  ═
  144. ├╞91  ┬╠╦╨╘╥   ┬LOCK-╨OINTER (┬-╨)                              ├─┬─
  145. ├╞┴6  ┬╒╞╘╙╘   ╘EST FOR ALLOCATED BUFFER RELATED TO SEC ADDR    ├──2  ═
  146. ├╞├6  ┬╦╧╘╙╘   ╘EST BLOCK OPERATION PARAMETERS                  ├─╞2
  147. ├╞├9  ┬╠╦╘╙╘   ╘EST FOR LEGAL BLK & SET UP DRIVE, TR, SECT      ├─╞5
  148. ├╞┼3  ─┬╠┬╒╞   ╙WITCH ACTIVE AND INACTIVE BUFFERS               ├╞1┼  ═
  149. ─03─  ─┬╙┼╘    ╙ET UP FOR DOUBLE BUFFERING                      ├╞7┬
  150. ─04┴  ╘╟╠┬╒╞   ╘OGGLE INACTIVE AND ACTIVE BUFFERS               ├╞8├
  151. ─059  ╨╔┬┘╘┼   ╨UT BYTE IN INTERNAL CHANNEL                     ├╞9┬
  152. ─060  ╨┬┬┘╘┼        "          "       "                        ├╞┴╞
  153. ─075  ╨╒╘      ═AIN ROUTINE TO WRITE TO A CHANNEL               ├╞┬7
  154. ─0┴╞  ╨╒╘┬┘╘┼  ╨UT ACCUMULATOR INTO ACTIVE BUFFER OF LOGICAL    ├╞╞1
  155.                INDEX
  156. ─0├3  ╔╬╘─╥╓   ╔NITIALIZE DRIVE                                 ─005  ╥
  157. ─0┼0  ╔╘╥╔┴╠   ╔NITIALIZE DRIVE NUMBER (─╥╓╬╒═)                 ─00┼
  158. ─12┼  ╬╞├┴╠├   ├OUNT NUMBER OF FREE BLOCKS                      ─075
  159. ─154  ╙╘╥╥─    ╙TART DBL BUFFERING; USE ╘,╙ AS STARTING BLK     ─09┬
  160. ─17├  ╥─┬╒╞    ╙TART A READ JOB ON ╘,╙ (ENTRY POINT)            ─0├3
  161. ─180  ╫╥╘┬╒╞   ╙TART A WRITE JOB ON ╘,╙ (ENTRY POINT)           ─0├7
  162. ─182  ╙╘╥╘╔╘   ┴CTUAL JOB ROUTINE                               ─0├9
  163. ─1┴5  ╞╬─╥├╚   ╞IND READ CHANNEL                                ─0┼┬
  164. ─1├1  ╞╬─╫├╚   ╞IND WRITE CHANNEL                               ─107
  165. ─1─╞  ╘┘╨╞╔╠   ╟ET FILE TYPE                                    ─125 ═ 
  166. ─1┼┴  ╟┼╘╨╥┼   ╙ET UP ╪,┘ FROM ACTIVE BUFFER NUMBER             ─12╞
  167. ─1╞2  ╟┼╘┬┘╘   ╥EAD BYTE FROM ACT BUF; SET FLAG IF LAST DATA    ─137
  168. ─211  ╥─┬┘╘    ╥EAD CHAR FROM FILE & READ NEXT BLK IF NEEDED    ─156
  169. ─258  ╫╥╘┬╒╞   ╫RITE CHAR TO CHAN & WRITE BUF TO DISK IF FULL   ─19─
  170. ─281  ╔╬├╨╬╘   ╔NCREMENT POINTER OF ACTIVE BUFFER BY ┴          ─1├6
  171. ─28┼  ╙┼╘─╥╓   ╙ET ─╥╓╬╒═ TO DRIVE INDICATED BY 1ST JOB OF BUF  ─1─3
  172. ─29┴  ╟┼╘╫├╚   ╙ET UP BUFFER NUMBER & ALLOCATE LOGICAL INDEX    ─1─╞ 
  173. ─29─  ╟┼╘╫├╚   ╫RITE ENTRY POINT                                ─1┼2
  174. ─29┼  ╟┼╘╥├╚   ╥EAD ENTRY POINT                                 ─1┼3
  175. ─2┼2  ╞╥┼├╚╬   ╞REE CHANNEL ASSOCIATED WITH SEC ADDRESS;        ─227  ═
  176.                DON'T FREE CHANNEL #15
  177. ─313  ╥┼╠┬╒╞   ╥ELEASE BUFFERS ASSOCIATED WITH CHANNEL          ─25┴
  178. ─349  ╟┼╘┬╒╞   ╟ET A FREE BUFFER                                ─28┼  ═
  179. ─38┴  ╞╥┼╔┴├   ╞REE INACTIVE BUFFER                             ─2─┴  ═
  180. ─3┬┴  ├╠─├╚╬   ├LEARED CHANNEL                                  ─313
  181. ─3┼0  ╞╬─╠╬╪   ╞IND A FREE CHANNEL AND ALLOCATE IT              ─37╞
  182. ─401  ╟┬┘╘┼    ╟ET NEXT CHARACTER FROM A CHANNEL                ─39┬
  183. ║NX:TABLE 1.4
  184.